home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue54 / Persist / FEditAddress.dfm < prev    next >
Encoding:
Text File  |  2000-01-07  |  2.0 KB  |  106 lines
  1. object FormEditAddress: TFormEditAddress
  2.   Left = 379
  3.   Top = 213
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = ' Edit an address'
  7.   ClientHeight = 247
  8.   ClientWidth = 274
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = False
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Label1: TLabel
  19.     Left = 8
  20.     Top = 8
  21.     Width = 61
  22.     Height = 13
  23.     Caption = 'Address &type'
  24.   end
  25.   object Label2: TLabel
  26.     Left = 8
  27.     Top = 32
  28.     Width = 62
  29.     Height = 13
  30.     Caption = 'Address &lines'
  31.   end
  32.   object Label3: TLabel
  33.     Left = 8
  34.     Top = 132
  35.     Width = 25
  36.     Height = 13
  37.     Caption = '&State'
  38.     FocusControl = eState
  39.   end
  40.   object Label4: TLabel
  41.     Left = 8
  42.     Top = 160
  43.     Width = 48
  44.     Height = 13
  45.     Caption = '&Post code'
  46.   end
  47.   object Label5: TLabel
  48.     Left = 8
  49.     Top = 188
  50.     Width = 36
  51.     Height = 13
  52.     Caption = '&Country'
  53.     FocusControl = eCountry
  54.   end
  55.   object tiButtonPanel1: TtiButtonPanel
  56.     Left = 0
  57.     Top = 216
  58.     Width = 274
  59.     Height = 31
  60.     OnBtn1Click = tiButtonPanel1Btn1Click
  61.     OnBtn2Click = tiButtonPanel1Btn2Click
  62.   end
  63.   object cbAddressType: TComboBox
  64.     Left = 80
  65.     Top = 4
  66.     Width = 145
  67.     Height = 21
  68.     Style = csDropDownList
  69.     ItemHeight = 13
  70.     TabOrder = 0
  71.     Items.Strings = (
  72.       'Home'
  73.       'Business'
  74.       'Postal')
  75.   end
  76.   object eCountry: TEdit
  77.     Left = 80
  78.     Top = 184
  79.     Width = 121
  80.     Height = 21
  81.     TabOrder = 4
  82.   end
  83.   object mAddress: TMemo
  84.     Left = 80
  85.     Top = 32
  86.     Width = 189
  87.     Height = 89
  88.     ScrollBars = ssVertical
  89.     TabOrder = 1
  90.   end
  91.   object eState: TEdit
  92.     Left = 80
  93.     Top = 128
  94.     Width = 121
  95.     Height = 21
  96.     TabOrder = 2
  97.   end
  98.   object ePostCode: TEdit
  99.     Left = 80
  100.     Top = 156
  101.     Width = 121
  102.     Height = 21
  103.     TabOrder = 3
  104.   end
  105. end
  106.